(VAR N X Y Z)
(STRATEGY CONTEXTSENSITIVE 
  (0)
  (s 1)
  (posrecip 1)
  (negrecip 1)
  (nil)
  (cons 1)
  (cons2 2)
  (rnil)
  (rcons 1 2)
  (from 1)
  (2ndspos 1 2)
  (2ndsneg 1 2)
  (pi 1)
  (plus 1 2)
  (times 1 2)
  (square 1)
)
(RULES 
from(X) -> cons(X,from(s(X)))
2ndspos(0,Z) -> rnil
2ndspos(s(N),cons(X,Z)) -> 2ndspos(s(N),cons2(X,Z))
2ndspos(s(N),cons2(X,cons(Y,Z))) -> rcons(posrecip(Y),2ndsneg(N,Z))
2ndsneg(0,Z) -> rnil
2ndsneg(s(N),cons(X,Z)) -> 2ndsneg(s(N),cons2(X,Z))
2ndsneg(s(N),cons2(X,cons(Y,Z))) -> rcons(negrecip(Y),2ndspos(N,Z))
pi(X) -> 2ndspos(X,from(0))
plus(0,Y) -> Y
plus(s(X),Y) -> s(plus(X,Y))
times(0,Y) -> 0
times(s(X),Y) -> plus(Y,times(X,Y))
square(X) -> times(X,X)
)